0 CLR
10 REM HYPER WARP
15 POKE53280,6:POKE53281,6:PRINT"[147]"
20 FOR L=54272 TO 54295:POKE L,0:NEXT:POKE 54296,15
30 POKE 54277,8:POKE 54278,255:POKE 54276,21
40 F1=2
50 FOR Z=1 TO 24:F2=80:POKE 54273,F1
60 FOR Y=1 TO 5:POKE 54287,F2:F2=F2*1.1
70 NEXT Y:F1=F1+9:NEXT Z
80 POKE 54278,15